home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / sendun1a / frmdata.frm < prev    next >
Text File  |  1999-10-22  |  41KB  |  1,312 lines
  1. VERSION 5.00
  2. Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
  3. Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.2#0"; "COMCTL32.OCX"
  4. Begin VB.Form frmData 
  5.    BackColor       =   &H00C0C0C0&
  6.    Caption         =   "Dev Mailer"
  7.    ClientHeight    =   5895
  8.    ClientLeft      =   60
  9.    ClientTop       =   345
  10.    ClientWidth     =   10275
  11.    FillColor       =   &H00C0C0C0&
  12.    ForeColor       =   &H00C0C0C0&
  13.    Icon            =   "frmData.frx":0000
  14.    LinkTopic       =   "Form1"
  15.    MaxButton       =   0   'False
  16.    MouseIcon       =   "frmData.frx":27A2
  17.    ScaleHeight     =   5895
  18.    ScaleWidth      =   10275
  19.    StartUpPosition =   2  'CenterScreen
  20.    Begin VB.PictureBox picLogo 
  21.       AutoRedraw      =   -1  'True
  22.       BackColor       =   &H00000000&
  23.       BorderStyle     =   0  'None
  24.       BeginProperty Font 
  25.          Name            =   "Arial"
  26.          Size            =   9.75
  27.          Charset         =   0
  28.          Weight          =   700
  29.          Underline       =   0   'False
  30.          Italic          =   0   'False
  31.          Strikethrough   =   0   'False
  32.       EndProperty
  33.       ForeColor       =   &H80000005&
  34.       Height          =   9375
  35.       Left            =   0
  36.       ScaleHeight     =   9375
  37.       ScaleWidth      =   255
  38.       TabIndex        =   30
  39.       TabStop         =   0   'False
  40.       Top             =   0
  41.       Width           =   255
  42.    End
  43.    Begin TabDlg.SSTab ssData 
  44.       Height          =   5850
  45.       Left            =   255
  46.       TabIndex        =   31
  47.       Top             =   30
  48.       Width           =   9960
  49.       _ExtentX        =   17568
  50.       _ExtentY        =   10319
  51.       _Version        =   327681
  52.       Style           =   1
  53.       Tabs            =   2
  54.       TabsPerRow      =   2
  55.       TabHeight       =   520
  56.       BackColor       =   12632256
  57.       TabCaption(0)   =   "&Redacci≤n"
  58.       TabPicture(0)   =   "frmData.frx":2AAC
  59.       Tab(0).ControlEnabled=   -1  'True
  60.       Tab(0).Control(0)=   "Label5"
  61.       Tab(0).Control(0).Enabled=   0   'False
  62.       Tab(0).Control(1)=   "Label2"
  63.       Tab(0).Control(1).Enabled=   0   'False
  64.       Tab(0).Control(2)=   "Label4"
  65.       Tab(0).Control(2).Enabled=   0   'False
  66.       Tab(0).Control(3)=   "Label1"
  67.       Tab(0).Control(3).Enabled=   0   'False
  68.       Tab(0).Control(4)=   "Process"
  69.       Tab(0).Control(4).Enabled=   0   'False
  70.       Tab(0).Control(5)=   "pix"
  71.       Tab(0).Control(5).Enabled=   0   'False
  72.       Tab(0).Control(6)=   "cmdAddAttach"
  73.       Tab(0).Control(6).Enabled=   0   'False
  74.       Tab(0).Control(7)=   "cmdDelAttach"
  75.       Tab(0).Control(7).Enabled=   0   'False
  76.       Tab(0).Control(8)=   "DataArrival"
  77.       Tab(0).Control(8).Enabled=   0   'False
  78.       Tab(0).Control(9)=   "Command4"
  79.       Tab(0).Control(9).Enabled=   0   'False
  80.       Tab(0).Control(10)=   "Command3"
  81.       Tab(0).Control(10).Enabled=   0   'False
  82.       Tab(0).Control(11)=   "tmr"
  83.       Tab(0).Control(11).Enabled=   0   'False
  84.       Tab(0).Control(12)=   "Frame1"
  85.       Tab(0).Control(12).Enabled=   0   'False
  86.       Tab(0).Control(13)=   "btnFecha"
  87.       Tab(0).Control(13).Enabled=   0   'False
  88.       Tab(0).Control(14)=   "Text4"
  89.       Tab(0).Control(14).Enabled=   0   'False
  90.       Tab(0).Control(15)=   "Text2"
  91.       Tab(0).Control(15).Enabled=   0   'False
  92.       Tab(0).Control(16)=   "Command2"
  93.       Tab(0).Control(16).Enabled=   0   'False
  94.       Tab(0).Control(17)=   "Command1"
  95.       Tab(0).Control(17).Enabled=   0   'False
  96.       Tab(0).Control(18)=   "Text1"
  97.       Tab(0).Control(18).Enabled=   0   'False
  98.       Tab(0).Control(19)=   "lstAttachment"
  99.       Tab(0).Control(19).Enabled=   0   'False
  100.       Tab(0).ControlCount=   20
  101.       TabCaption(1)   =   "&Configuraci≤n"
  102.       TabPicture(1)   =   "frmData.frx":2AC8
  103.       Tab(1).ControlEnabled=   0   'False
  104.       Tab(1).Control(0)=   "cmdApply"
  105.       Tab(1).Control(0).Enabled=   0   'False
  106.       Tab(1).Control(1)=   "Frame2"
  107.       Tab(1).Control(1).Enabled=   0   'False
  108.       Tab(1).Control(2)=   "Frame3"
  109.       Tab(1).Control(2).Enabled=   0   'False
  110.       Tab(1).Control(3)=   "cmdDelReg"
  111.       Tab(1).Control(3).Enabled=   0   'False
  112.       Tab(1).Control(4)=   "Command5"
  113.       Tab(1).Control(4).Enabled=   0   'False
  114.       Tab(1).ControlCount=   5
  115.       Begin VB.CommandButton Command5 
  116.          BackColor       =   &H00808080&
  117.          Caption         =   "&Salir"
  118.          Height          =   375
  119.          Left            =   -73140
  120.          TabIndex        =   29
  121.          Top             =   5310
  122.          Width           =   1215
  123.       End
  124.       Begin VB.CommandButton cmdDelReg 
  125.          Appearance      =   0  'Flat
  126.          Height          =   345
  127.          Left            =   -73590
  128.          Picture         =   "frmData.frx":2AE4
  129.          Style           =   1  'Graphical
  130.          TabIndex        =   28
  131.          ToolTipText     =   "Cancelar Operaci≤n"
  132.          Top             =   5340
  133.          Width           =   345
  134.       End
  135.       Begin VB.Frame Frame3 
  136.          Caption         =   "Informaci≤n del usuario"
  137.          Height          =   795
  138.          Left            =   -74910
  139.          TabIndex        =   26
  140.          Top             =   1650
  141.          Width           =   5205
  142.          Begin VB.TextBox txtMailSend 
  143.             Height          =   315
  144.             IMEMode         =   3  'DISABLE
  145.             Left            =   2040
  146.             TabIndex        =   32
  147.             Top             =   300
  148.             Width           =   2625
  149.          End
  150.          Begin VB.Label Label10 
  151.             AutoSize        =   -1  'True
  152.             Caption         =   "&Direcci≤n de Correo:"
  153.             Height          =   195
  154.             Left            =   210
  155.             TabIndex        =   33
  156.             Top             =   360
  157.             Width           =   1455
  158.          End
  159.       End
  160.       Begin VB.Frame Frame2 
  161.          Caption         =   "Informaci≤n del Servidor"
  162.          Height          =   1125
  163.          Left            =   -74910
  164.          TabIndex        =   21
  165.          Top             =   450
  166.          Width           =   5205
  167.          Begin VB.TextBox txtSMTP 
  168.             Height          =   315
  169.             IMEMode         =   3  'DISABLE
  170.             Left            =   1980
  171.             MaxLength       =   20
  172.             TabIndex        =   23
  173.             Top             =   270
  174.             Width           =   3015
  175.          End
  176.          Begin VB.TextBox txtSMTPport 
  177.             Height          =   315
  178.             IMEMode         =   3  'DISABLE
  179.             Left            =   1980
  180.             MaxLength       =   20
  181.             TabIndex        =   25
  182.             Text            =   "25"
  183.             Top             =   660
  184.             Width           =   1125
  185.          End
  186.          Begin VB.Label Label7 
  187.             AutoSize        =   -1  'True
  188.             Caption         =   "&Puerto de Salida:"
  189.             Height          =   195
  190.             Left            =   150
  191.             TabIndex        =   24
  192.             Top             =   720
  193.             Width           =   1215
  194.          End
  195.          Begin VB.Label Label3 
  196.             AutoSize        =   -1  'True
  197.             Caption         =   "Correo saliente (SMTP):"
  198.             Height          =   195
  199.             Left            =   120
  200.             TabIndex        =   22
  201.             Top             =   330
  202.             Width           =   1680
  203.          End
  204.       End
  205.       Begin VB.CommandButton cmdApply 
  206.          BackColor       =   &H00808080&
  207.          Caption         =   "&Aplicar"
  208.          Height          =   375
  209.          Left            =   -74880
  210.          TabIndex        =   27
  211.          Top             =   5310
  212.          Width           =   1215
  213.       End
  214.       Begin ComctlLib.ListView lstAttachment 
  215.          Height          =   2235
  216.          Left            =   4710
  217.          TabIndex        =   12
  218.          Top             =   1470
  219.          Width           =   5175
  220.          _ExtentX        =   9128
  221.          _ExtentY        =   3942
  222.          View